10 A=18432 20 B=1 30 POKE53272,24 40 FORI=0TO5:FORX=0TO4 50 POKE1024+I*40+X,PEEK(A+I*256+B*5+X) 60 NEXTX 70 NEXTI